//
// *****************************
// * START OPENCOCKPITS MCP V3 *
// *****************************
//
// ******************
// * START DISPLAYS *
// ******************

Var 5000, name D_CRS1, Link IOCARD_DISPLAY, Device 8, Digit 0, Numbers 3
Var 5001, name SIM_CRS1, Link FSUIPC_INOUT, Offset $9434, Length 2
{
 IF &SIM_CRS1 = 65535
 {
  &D_CRS1 = -999999
 }
 ELSE
 {
 &D_CRS1 = &SIM_CRS1
 }
}

Var 5002, name DECIMAL, Link IOCARD_OUT, Device 8, Output 20
Var 5003, name D_SPD, Link IOCARD_DISPLAY, Device 8, Digit 3, Numbers 3
Var 5004, name SIM_SPD, Link FSUIPC_INOUT, Offset $9436, Length 2
{
 IF &SIM_SPD = 65535
 {
  &D_SPD = -999999
 }
 ELSE
  {
   IF &SIM_SPD < 100
   {
   &D_SPD = &SIM_SPD
   &DECIMAL = 1
   }
   ELSE
   {
   &D_SPD = &SIM_SPD
   &DECIMAL = 0
   }
 }
}
Var 5005, name D_HDG, Link IOCARD_DISPLAY, Device 8, Digit 6, Numbers 3
Var 5006, name SIM_HDG, Link FSUIPC_INOUT, Offset $9438, Length 2
{
 IF &SIM_HDG = 65535
 {
  &D_HDG = -999999
 }
 ELSE
 {
 &D_HDG = &SIM_HDG
 }
}
Var 5007, name D_ALT, Link IOCARD_DISPLAY, Device 8, Digit 9, Numbers 5
{
 IF &SIM_ALT = 65535
 {
  &D_ALT = -999999
 }
}
Var 5008, name SIM_ALT, Link FSUIPC_INOUT, Offset $943A, Length 2
{
 IF &SIM_ALT = 23352
 {
  &D_ALT = 88888
 } 
 ELSE
 {
 &D_ALT = &SIM_ALT
 }
}

Var 5009, name D_VS, Link IOCARD_DISPLAY, Device 8, Digit 14, Numbers 5
Var 5010, name VS_FLAG, Link FSUIPC_INOUT, Offset $948F, Length 1
Var 5011, name SIM_VS, Link FSUIPC_INOUT, Offset $943C, Length 2
{
 IF &SIM_VS = 65535
 {
  &D_VS = -999999
 }
 ELSE
 {
    IF &VS_FLAG = 12
    {
    L0 = &SIM_VS
    &D_VS = L0 * -1
    }
    ELSE
    {
    &D_VS = &SIM_VS
    }
 }
}
Var 5012, name D_CRS2, Link IOCARD_DISPLAY, Device 8, Digit 19, Numbers 3
Var 5013, name SIM_CRS2, Link FSUIPC_INOUT, Offset $943E, Length 2
{
 IF &SIM_CRS2 = 65535
 {
  &D_CRS2 = -999999
 }
 ELSE
 {
 &D_CRS2 = &SIM_CRS2
 }
}
//
// ********************
// * END MCP DISPLAYS *
// ********************
//
// **********************
// * START MCP ENCODERS *
// **********************
//
Var 5015, name IN_CRS1, Link FSUIPC_INOUT, Offset $94F1, Length 1
Var 5016, name E_CRS1, Link IOCARD_ENCODER, Device 8, Input 4, Aceleration 1, Type 2
{
  if &E_CRS1 < 0 
  {
     &command = 197             
  }
  ELSE
  {
     &command = 198     
  }
}
Var 5017, name IN_SPD, Link FSUIPC_INOUT, Offset $94F3, Length 1
Var 5018, name E_SPD, Link IOCARD_ENCODER, Device 8, Input 0, Aceleration 1, Type 2
{
  if &E_SPD < 0 
  {
     &command = 207    
  }
  ELSE
  {
     &command = 208     
  }
}
Var 5019, name IN_HDG, Link FSUIPC_INOUT, Offset $94F5, Length 1
Var 5020, name E_HDG_BA, Link IOCARD_ENCODER, Device 8, Input 6, Aceleration 1000, Type 2
{
  if &E_HDG_BA < 0
  { 
    IF &HDG_BA_SW = 0
	{
	  &command = 223
 	}
	IF &HDG_BA_SW = 1 
	{
	  &command = 225
        }
  }
  ELSE
  {
    IF &HDG_BA_SW = 0 
	{
	  &command = 224
        }
	IF &HDG_BA_SW = 1 
	{
	  &command = 226
        }
  }
}  
Var 5073, name HDG_BA_SW, Link IOCARD_SW, Device 8, Input 34
{
  IF &HDG_BA_SW = 1
  {
    &D_HDG = &SIM_BL_DP
  }
  ELSE
  {
    &D_HDG = &SIM_HDG
  }
}
Var 5076, name SIM_BL_DP, Link SUBRUTINE
Var 5075, name SIM_BL_FS, Link FSUIPC_INOUT, Offset $947B, Length 1
{
  L0 = &SIM_BL_FS * 5
  &SIM_BL_DP = L0 + 10
}
//
Var 5021, name IN_ALT, Link FSUIPC_INOUT, Offset $94F0, Length 1
Var 5022, name E_ALT, Link IOCARD_ENCODER, Device 8, Input 2, Aceleration 1, Type 2
{
  if &E_ALT < 0 
  {
     &command = 214        
  }
  ELSE
  {
     &command = 215   
  }
}
Var 5023, name IN_VS, Link FSUIPC_INOUT, Offset $94F4, Length 1
Var 5024, name E_VS, Link IOCARD_ENCODER, Device 8, Input 11, Aceleration 1, Type 2
{
  if &E_VS < 0 
  {
     &command = 218         
  }
  ELSE
  {
     &command = 217    
  }
}
Var 5025, name IN_CRS2, Link FSUIPC_INOUT, Offset $94F2, Length 1
Var 5026, name E_CRS2, Link IOCARD_ENCODER, Device 8, Input 9, Aceleration 1, Type 2
{
  if &E_CRS2 < 0 
  {
     &command = 199         
  }
  ELSE
  {
     &command = 200   
  }
}
//
// ********************
// * END MCP ENCODERS *
// ********************
//
// *******************
// * START MCP LED'S *
// *******************

Var 5027, name MCP1, Link FSUIPC_INOUT, Offset $9409, Length 1
{
 &L_AT = TESTBIT &MCP1 ,0
 &L_VNAV = TESTBIT &MCP1 ,1
 &L_LNAV = TESTBIT &MCP1 ,2
 &L_CMDA = TESTBIT &MCP1 ,3
 &L_CMDB = TESTBIT &MCP1 ,4
 &L_FDMA1 = TESTBIT &MCP1 ,5
 &L_VOR = TESTBIT &MCP1 ,6
}
Var 5028, name MCP2, Link FSUIPC_INOUT, Offset $940A, Length 1 
{
 &L_CWSA = TESTBIT &MCP2 ,0
 &L_CWSB = TESTBIT &MCP2 ,1
 &L_FDMA2 = TESTBIT &MCP2 ,2 
 &L_N1 = TESTBIT &MCP2 ,3
 &L_SPD = TESTBIT &MCP2 ,4
 &L_LVL = TESTBIT &MCP2 ,5
 &L_HDG = TESTBIT &MCP2 ,6
 &L_APP = TESTBIT &MCP2 ,7
}
Var 5029, name MCP3, Link FSUIPC_INOUT, Offset $940B, Length 1
{
 &L_ALT = TESTBIT &MCP3 ,0
 &L_VS = TESTBIT &MCP3 ,1
}

Var 5030, name L_N1, Link IOCARD_OUT, Device 8, Output 21
Var 5031, name L_AT, Link IOCARD_OUT, Device 8, Output 22
Var 5032, name L_SPD, Link IOCARD_OUT, Device 8, Output 23
Var 5033, name L_LVL, Link IOCARD_OUT, Device 8, Output 24
Var 5034, name L_VNAV, Link IOCARD_OUT, Device 8, Output 25
Var 5035, name L_HDG, Link IOCARD_OUT, Device 8, Output 26
Var 5036, name L_APP, Link IOCARD_OUT, Device 8, Output 27
Var 5037, name L_VOR, Link IOCARD_OUT, Device 8, Output 28
Var 5038, name L_LNAV, Link IOCARD_OUT, Device 8, Output 29
Var 5039, name L_ALT, Link IOCARD_OUT, Device 8, Output 30
Var 5040, name L_VS, Link IOCARD_OUT, Device 8, Output 31
Var 5041, name L_CWSA, Link IOCARD_OUT, Device 8, Output 32
Var 5042, name L_CMDA, Link IOCARD_OUT, Device 8, Output 33
Var 5043, name L_CWSB, Link IOCARD_OUT, Device 8, Output 34
Var 5044, name L_CMDB, Link IOCARD_OUT, Device 8, Output 35
Var 5065, name L_FDMA1, Link IOCARD_OUT, Device 8, Output 37
Var 5066, name L_FDMA2, Link IOCARD_OUT, Device 8, Output 36
//
// *****************
// * END MCP LED'S *
// *****************
//
// **********************
// * START MCP SWITCHES *
// **********************
//
Var 5045, name S_FD1, Link IOCARD_SW, Device 8, Input 16
{
 IF &S_FD1 = 1
 {
  &command = 189
 }
 ELSE
 {
  &command = 190
 }
}
Var 5046, name S_AT, Link IOCARD_SW, Device 8, Input 33
{
 IF &S_AT = 1
 {
  &command = 202
 }
 ELSE
 {
  &command = 203
 }
}
Var 5047, name S_N1, Link IOCARD_SW, Device 8, Input 32
{
 IF &S_N1 = 1
 {
  &command = 205
 }
}
Var 5048, name S_CO, Link IOCARD_SW, Device 8, Input 13
{
 IF &S_CO = 1
 {
  &command = 204
 }
}
Var 5049, name S_SPD, Link IOCARD_SW, Device 8, Input 31
{
 IF &S_SPD = 1
 {
  &command = 206
 }
}
Var 5050, name S_VNAV, Link IOCARD_SW, Device 8, Input 30
{
 IF &S_VNAV = 1
 {
  &command = 210
 }
}
Var 5051, name S_LVL, Link IOCARD_SW, Device 8, Input 29
{
 IF &S_LVL = 1
 {
  &command = 211
 }
}
Var 5052, name S_HDG, Link IOCARD_SW, Device 8, Input 28
{
 IF &S_HDG = 1
 {
  &command = 222
 }
}
Var 5053, name S_LNAV, Link IOCARD_SW, Device 8, Input 27
{
 IF &S_LNAV = 1
 {
  &command = 220
 }
}
Var 5054, name S_VOR, Link IOCARD_SW, Device 8, Input 25
{
 IF &S_VOR = 1
 {
  &command = 221
 }
}
Var 5055, name S_APP, Link IOCARD_SW, Device 8, Input 24
{
 IF &S_APP = 1
 {
  &command = 212
 }
}
Var 5056, name S_ALT, Link IOCARD_SW, Device 8, Input 23
{
 IF &S_ALT = 1
 {
  &command = 213
 }
}
Var 5057, name S_VS, Link IOCARD_SW, Device 8, Input 22
{
 IF &S_VS = 1
 {
  &command = 216
 }
}
Var 5058, name S_CMDA, Link IOCARD_SW, Device 8, Input 21
{
 IF &S_CMDA = 1
 {
  &command = 184
 }
}
Var 5059, name S_CWSA, Link IOCARD_SW, Device 8, Input 20
{
 IF &S_CWSA = 1
 {
  &command = 186
 }
}
Var 5060, name S_CMDB, Link IOCARD_SW, Device 8, Input 19
{
 IF &S_CMDB = 1
 {
  &command = 185
 }
}
Var 5061, name S_CWSB, Link IOCARD_SW, Device 8, Input 18
{
 IF &S_CWSB = 1
 {
  &command = 187
 }
}
Var 5062, name S_APDIS, Link IOCARD_SW, Device 8, Input 15
{
 IF &S_APDIS = 1
 {
  &command = 196
 }
 ELSE
 {
  &command = 195
 }
}
Var 5063, name S_FD2, Link IOCARD_SW, Device 8, Input 14
{
 IF &S_FD2 = 1
 {
  &command = 192
 }
 ELSE
 {
  &command = 193
 }
}
//
// ********************
// * END MCP SWITCHES *
// ********************
//
// *****************************
// * EINDE OPENCOCKPITS MCP V3 *
// *****************************
//
Var 0099, name COMMAND, Link FSUIPC_INOUT, Offset $9400, Length 2  // Send Commands